home *** CD-ROM | disk | FTP | other *** search
/ Languguage OS 2 / Languguage OS II Version 10-94 (Knowledge Media)(1994).ISO / language / dino / dino_bot.1 / source / library / copy.s < prev    next >
Encoding:
Text File  |  1991-03-10  |  959 b   |  78 lines
  1. ;    Static Name Aliases
  2. ;
  3.     NAME   D_mem_copy
  4.  
  5. ;    .287
  6. CODE    SEGMENT  ER PUBLIC 
  7. CODE    ENDS
  8. DATA    SEGMENT  RW PUBLIC
  9. DATA    ENDS
  10.  
  11.     ASSUME  DS: DATA, SS: DATA, ES: DATA
  12.  
  13. CODE      SEGMENT ER PUBLIC
  14. ;    dest = 6
  15. ;    src = 10
  16. ;    n = 14
  17. ; Line 2
  18.     PUBLIC    _D_mem_copy
  19. _D_mem_copy    PROC FAR
  20.     enter    2,0
  21.     push    si
  22.     push    ds
  23.     push    di
  24.     push    es
  25.     push    cx
  26.     pushf
  27.  
  28.     mov    cx,[bp+14]; n
  29.     les    di,DWORD PTR[bp+6]
  30.     lds    si,DWORD PTR[bp+10]
  31.     cld
  32.     rep movsb
  33.  
  34.     popf
  35.     pop    cx
  36.     pop    es
  37.     pop    di
  38.     pop    ds
  39.     pop    si
  40.     leave    
  41.     ret    
  42.  
  43. _D_mem_copy    ENDP
  44.  
  45.  
  46. ;       p = 6
  47. ;       n = 10
  48.         PUBLIC  _D_init_bitmap
  49. _D_init_bitmap    PROC FAR
  50.     enter     2,0
  51.         push    si
  52.         push    ds
  53.         push    di
  54.         push    es
  55.         push    cx
  56.     push    ax
  57.         pushf
  58.  
  59.     mov    cx, [bp+10]
  60.     mov    al,0
  61.     les    di,DWORD PTR[bp+6]
  62.     cld
  63.     rep stosb
  64.  
  65.         popf
  66.     pop    ax
  67.         pop     cx
  68.         pop     es
  69.         pop     di
  70.         pop     ds
  71.         pop     si
  72.         leave
  73.         ret
  74.  
  75. _D_init_bitmap    ENDP
  76. CODE    ENDS
  77. END
  78.